Uchat 1.0/DLX/MENUDLX.SDL

;
; These are the basic DLX commands used in all menus
;
Macro: DLXCMDS
Entry:

A,B,C,I,L,N,O,P,Q,T,W or ? ~
KEY=A TYPE=45 Opt Data=DLXA
Entry:
KEY=B TYPE=45 Opt Data=DLXB
Entry:
KEY=C TYPE=45 Opt Data=DLXC
Entry:
KEY=I TYPE=45 Opt Data=DLXI
Entry:
KEY=L TYPE=45 Opt Data=DLXL
Entry:
KEY=N TYPE=45 Opt Data=DLXN
Entry:
KEY=O TYPE=45 Opt Data=DLXO
Entry:
KEY=P TYPE=45 Opt Data=DLXP
Entry:
KEY=Q TYPE=12 Opt Data=1
Entry:
KEY=T TYPE=45 Opt Data=DLXT
Entry:
KEY=W TYPE=45 Opt Data=DLXW
EndMacro:

;
; This is the main entry point for DLX emulation.
;
; NOTE: When a user enters, they are changed to ChatOK status
; automatically!  You can change this by deleting the entries
; that use KEY=^@ in this menu.
;
Menu: DLX
Title:

*** Welcome to the Chat Lounge ***
EndTitle:
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:V
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:L
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:OC
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:"A ChatOK"
@DLXCMDS
EndMenu:

;
; Same as above menu, but does not say Welcome...
;
Menu: DLX1
@DLXCMDS
EndMenu:

; Individual menus for running commands
Menu: DLXA
Title:

You are now available for chats.
EndTitle:
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:V
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:L
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:OC
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:"A ChatOK"
@DLXCMDS
EndMenu:

Menu: DLXB
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /C:/B
Entry:
KEY=^@ TYPE=45 Opt Data=DLX1
EndMenu:

Menu: DLXC
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /C:C
Entry:
KEY=^@ TYPE=45 Opt Data=DLX1
EndMenu:

Menu: DLXI
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /C:J
Entry:
KEY=^@ TYPE=45 Opt Data=DLX1
EndMenu:

Menu: DLXL
Title:

You will not get login notifications and you are now unavailable for chats.
EndTitle:
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:N
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:V
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:OC
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:"A NoLOGS"
@DLXCMDS
EndMenu:

Menu: DLXN
Title:

You are now unavailable for chats.
EndTitle:
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:V
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:OC
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:L
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:"A NoChat"
@DLXCMDS
EndMenu:

Menu: DLXO
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /E:3
Entry:
KEY=^@ TYPE=45 Opt Data=DLX1
EndMenu:

Menu: DLXP
Title:

You are now unavailable for chats and you cannot be paged for chat.
EndTitle:
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:I
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:N
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:NC
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /N /C:"A PageOff"
@DLXCMDS
EndMenu:

Menu: DLXT
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /C:"C SYSOP"
Entry:
KEY=^@ TYPE=45 Opt Data=DLX1
EndMenu:

Menu: DLXW
Entry:
KEY=^@ TYPE=203 Opt Data=/P1:DLX /C:/W
Entry:
KEY=^@ TYPE=45 Opt Data=DLX1
EndMenu: